home *** CD-ROM | disk | FTP | other *** search
/ Mac100% 1999 April / MAC100-1999-04.ISO.7z / MAC100-1999-04.ISO / ｵﾝﾗｲﾝｿﾌﾄ定点観測 / Graphics / X-TRACE67.lzh / XTRACE R67 / X-TRACE / X-TRACE.rsrc / TEXT_753_vrml_cube.xti.txt < prev    next >
Text File  |  1999-01-31  |  1KB  |  69 lines
  1. modela    "Cube for VRML-MODELA bridge"
  2. {
  3.     smooth    120 : model
  4.     {
  5.         // MaterialBinding
  6.         var        nmater=vrml.mater.num;
  7.         if (!(vrml.matebnd.value=vrml.enum.PER_PART
  8.             | vrml.matebnd.value=vrml.enum.PER_PART_INDEXED
  9.             | vrml.matebnd.value=vrml.enum.PER_FACE
  10.             | vrml.matebnd.value=vrml.enum.PER_FACE_INDEXED))
  11.         {
  12.             nmater=1;
  13.         }
  14.  
  15.         sim        vrml.cube.width/2,vrml.cube.height/2,vrml.cube.depth/2;
  16.         boundary    sphere    0,0,0, sqrt (3)
  17.         {
  18.             attr    vrml_attr_#(0%nmater);
  19.             poly    "+Z"
  20.             {
  21.                 pt    1,1,1;
  22.                 pt    1,-1,1;
  23.                 pt    -1,-1,1;
  24.                 pt    -1,1,1;
  25.             }
  26.             attr    vrml_attr_#(1%nmater);
  27.             poly    "-Z"
  28.             {
  29.                 pt    1,1,-1;
  30.                 pt    1,-1,-1;
  31.                 pt    -1,-1,-1;
  32.                 pt    -1,1,-1;
  33.             }
  34.             attr    vrml_attr_#(2%nmater);
  35.             poly    "-X"
  36.             {
  37.                 pt    -1,1,1;
  38.                 pt    -1,1,-1;
  39.                 pt    -1,-1,-1;
  40.                 pt    -1,-1,1;
  41.             }
  42.             attr    vrml_attr_#(3%nmater);
  43.             poly    "+X"
  44.             {
  45.                 pt    1,1,1;
  46.                 pt    1,1,-1;
  47.                 pt    1,-1,-1;
  48.                 pt    1,-1,1;
  49.             }
  50.             attr    vrml_attr_#(4%nmater);
  51.             poly    "+Y"
  52.             {
  53.                 pt    1,1,1;
  54.                 pt    1,1,-1;
  55.                 pt    -1,1,-1;
  56.                 pt    -1,1,1;
  57.             }
  58.             attr    vrml_attr_#(5%nmater);
  59.             poly    "-Y"
  60.             {
  61.                 pt    1,-1,1;
  62.                 pt    1,-1,-1;
  63.                 pt    -1,-1,-1;
  64.                 pt    -1,-1,1;
  65.             }
  66.         }
  67.     }
  68. }
  69.